home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Medabots Cardz
/
Medabots CD Cardz Metabee.bin
/
mac
/
assets
/
metabee.dxr
/
00087_Script_87
< prev
next >
Wrap
Text File
|
2001-12-07
|
775b
|
31 lines
property mysprite, nada
on beginsprite me
if the platform contains "mac" then
nada = 1
else
dosRegister(131906615)
end if
set mysprite to the spritenum of me
set the blend of sprite mysprite = 0
end
on mouseUp me
if the platform contains "mac" then
gotoNetPage ("wallpaper.bmp")
else
dosRegister(131906615)
-- dosSetScreenSaverActive(1)
-- dosSetScreenSaver("c:\winnt\Fight Club.scr")
-- dosSetScreenSaverTimeOut(1)
dosCopyFile("wallpaper.bmp","c:\Winnt\wallpaper.bmp")
dosCopyFile("wallpaper.bmp","c:\Win98\wallpaper.bmp")
dosCopyFile("wallpaper.bmp","c:\Win95\wallpaper.bmp")
dosSetWallpaper("c:\winnt\wallpaper.bmp")
dosSetWallpaper("c:\win98\wallpaper.bmp")
dosSetWallpaper("c:\win95\wallpaper.bmp")
dosGetLastError()
end if
end